object frmIniData: TfrmIniData
  Left = 369
  Top = 128
  Width = 778
  Height = 513
  Caption = #26399#21021#25968#25454#23548#20837
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object RzToolbar1: TRzToolbar
    Left = 0
    Top = 0
    Width = 762
    Height = 44
    RowHeight = 40
    ButtonLayout = blGlyphTop
    ButtonWidth = 40
    ButtonHeight = 40
    ShowButtonCaptions = True
    TextOptions = ttoCustom
    BorderInner = fsNone
    BorderOuter = fsGroove
    BorderSides = [sdTop]
    BorderWidth = 0
    TabOrder = 0
    ToolbarControls = (
      RzToolButton1
      RzToolButton2)
    object RzToolButton1: TRzToolButton
      Left = 4
      Top = 2
      Layout = blGlyphTop
      Caption = #23548#20837
      OnClick = RzToolButton1Click
    end
    object RzToolButton2: TRzToolButton
      Left = 44
      Top = 2
      Layout = blGlyphTop
      Caption = #26356#26032
      Visible = False
    end
  end
  object RzPageControl1: TRzPageControl
    Left = 0
    Top = 44
    Width = 762
    Height = 412
    ActivePage = TabSheet2
    Align = alClient
    TabIndex = 1
    TabOrder = 1
    FixedDimension = 19
    object TabSheet1: TRzTabSheet
      Caption = #26399#21021#23458#25143#24211#23384
      object DBGridEhClient: TDBGridEh
        Left = 0
        Top = 0
        Width = 758
        Height = 389
        Align = alClient
        DataGrouping.GroupLevels = <>
        DataSource = dsClientStorage
        Flat = False
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        RowDetailPanel.Color = clBtnFace
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            EditButtons = <>
            FieldName = 'ID'
            Footers = <>
            Visible = False
          end
          item
            EditButtons = <>
            FieldName = 'ClientID'
            Footers = <>
            Title.Caption = #23458#25143'ID'
          end
          item
            EditButtons = <>
            FieldName = 'clientname'
            Footers = <>
            Title.Caption = #23458#25143#21517#31216
            Width = 100
          end
          item
            EditButtons = <>
            FieldName = 'ProductID'
            Footers = <>
            Title.Caption = #21830#21697'ID'
          end
          item
            EditButtons = <>
            FieldName = 'productname'
            Footers = <>
            Title.Caption = #21830#21697#21517#31216
          end
          item
            EditButtons = <>
            FieldName = 'Amount'
            Footers = <>
            Title.Caption = #25968#37327
          end>
        object RowDetailData: TRowDetailPanelControlEh
        end
      end
    end
    object TabSheet2: TRzTabSheet
      Caption = #26399#21021#20844#21496#24211#23384
      object DBGridEStorage: TDBGridEh
        Left = 0
        Top = 0
        Width = 758
        Height = 389
        Align = alClient
        DataGrouping.GroupLevels = <>
        DataSource = dsStorage
        Flat = False
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        RowDetailPanel.Color = clBtnFace
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            EditButtons = <>
            FieldName = 'ID'
            Footers = <>
            Visible = False
          end
          item
            EditButtons = <>
            FieldName = 'DepotName'
            Footers = <>
            Title.Caption = #20179#24211#21517#31216
            Width = 80
          end
          item
            EditButtons = <>
            FieldName = 'ProductID'
            Footers = <>
            Title.Caption = #21830#21697'ID'
          end
          item
            EditButtons = <>
            FieldName = 'productname'
            Footers = <>
            Title.Caption = #21830#21697#21517#31216
          end
          item
            EditButtons = <>
            FieldName = 'EmptyAmount'
            Footers = <>
            Title.Caption = #31354#29942#25968#37327
          end
          item
            EditButtons = <>
            FieldName = 'FullAmount'
            Footers = <>
            Title.Caption = #23454#29942#25968#37327
          end>
        object RowDetailData: TRowDetailPanelControlEh
        end
      end
    end
  end
  object RzStatusBar1: TRzStatusBar
    Left = 0
    Top = 456
    Width = 762
    Height = 19
    BorderInner = fsNone
    BorderOuter = fsNone
    BorderSides = [sdLeft, sdTop, sdRight, sdBottom]
    BorderWidth = 0
    TabOrder = 2
  end
  object dsClientStorage: TDataSource
    DataSet = qryClientStorage
    Left = 105
    Top = 152
  end
  object dsStorage: TDataSource
    DataSet = qryStorage
    Left = 177
    Top = 144
  end
  object qryClientStorage: TADOQuery
    Connection = dm.conn
    Parameters = <>
    SQL.Strings = (
      'select * from clientstorage')
    Left = 105
    Top = 208
    object atncfldClientStorageID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object intgrfldClientStorageClientID: TIntegerField
      FieldName = 'ClientID'
    end
    object intgrfldClientStorageProductID: TIntegerField
      FieldName = 'ProductID'
    end
    object intgrfldClientStorageAmount: TIntegerField
      FieldName = 'Amount'
    end
    object strngfldClientStorageclientname: TStringField
      FieldKind = fkLookup
      FieldName = 'clientname'
      LookupDataSet = dm.qryClient
      LookupKeyFields = 'ID'
      LookupResultField = 'ClientName'
      KeyFields = 'ClientID'
      ProviderFlags = [pfInWhere]
      Lookup = True
    end
    object strngfldClientStorageproductname: TStringField
      FieldKind = fkLookup
      FieldName = 'productname'
      LookupDataSet = dm.qryProduct
      LookupKeyFields = 'ID'
      LookupResultField = 'ProductName'
      KeyFields = 'ProductID'
      ProviderFlags = [pfInWhere]
      Lookup = True
    end
  end
  object qryStorage: TADOQuery
    Connection = dm.conn
    Parameters = <>
    SQL.Strings = (
      'select * from storage')
    Left = 217
    Top = 208
    object atncfldStorageID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object wdstrngfldStorageDepotName: TWideStringField
      FieldName = 'DepotName'
      Size = 50
    end
    object intgrfldStorageProductID: TIntegerField
      FieldName = 'ProductID'
    end
    object intgrfldStorageEmptyAmount: TIntegerField
      FieldName = 'EmptyAmount'
    end
    object intgrfldStorageFullAmount: TIntegerField
      FieldName = 'FullAmount'
    end
    object strngfldStorageproductname: TStringField
      FieldKind = fkLookup
      FieldName = 'productname'
      LookupDataSet = dm.qryProduct
      LookupKeyFields = 'ID'
      LookupResultField = 'ProductName'
      KeyFields = 'ProductID'
      ProviderFlags = [pfInWhere]
      Lookup = True
    end
  end
  object QImport2Wizard1: TQImport2Wizard
    Formats.BooleanTrue.Strings = (
      'True')
    Formats.BooleanFalse.Strings = (
      'False')
    Formats.NullValues.Strings = (
      'Null')
    FieldFormats = <>
    ErrorLogFileName = 'error.log'
    Left = 313
    Top = 160
  end
end
